home *** CD-ROM | disk | FTP | other *** search
/ Software Vault: The Gold Collection / Software Vault - The Gold Collection (American Databankers) (1993).ISO / cdr10 / boxit010.zip / BOXIT.KEY < prev    next >
Text File  |  1993-06-24  |  3KB  |  52 lines
  1. /*
  2.   ┌╥─────────────────────────────────────────────────────────────────────╥┐
  3.   │║ Macro Title: BoxIt!                                                 ║│
  4.   │║ Version....: 0.10 for TSE 1.0 Pre-Release                           ║│
  5.   │║ Author.....: George J. De Bruin                                     ║│
  6.   │║ Address....: 1414 Shiloh Rd. Apt/Box 511                            ║│
  7.   │║              Plano, TX 75074                                        ║│
  8.   │║ Phone......: (214) 422-0266                                         ║│
  9.   │║ BBS Contact: Qedit support conferences on the following Mail Nets:  ║│
  10.   │║              RIME, Ilink, Intelec, Metrolink, FidoNet, EchoNet.     ║│
  11.   │║              Also available via the Ilink Editor's Conference, and  ║│
  12.   │║              directly on SemWare's Support BBS.                     ║│
  13.   │╟─────────────────────────────────────────────────────────────────────╢│
  14.   │║ This macro is hereby released as freeware.  Anyone may use          ║│
  15.   │║ or modify it in any way they see fit.  Future versions may carry    ║│
  16.   │║ more notices on distributing modified versions of BoxIt!            ║│
  17.   │╟─────────────────────────────────────────────────────────────────────╢│
  18.   │║                       R E L E A S E   N O T I C E                   ║│
  19.   │║                                                                     ║│
  20.   │║ This macro is officially released to SemWare for possible           ║│
  21.   │║ distribution in conjunction with The SemWare Editor, or an ancillary║│
  22.   │║ macro collection.                                                   ║│
  23.   │╟─────────────────────────────────────────────────────────────────────╢│
  24.   │║ Purpose:                                                            ║│
  25.   │║                                                                     ║│
  26.   │║ This is a simple macro that will draw a box around column blocked   ║│
  27.   │║ area using TSE's internal line drawing mode.  *ONLY* column blocks  ║│
  28.   │║ are supported at this time.                                         ║│
  29.   └╨─────────────────────────────────────────────────────────────────────╨┘
  30. */
  31.  
  32. /* ───────────────────────────────────────────────────────────────────
  33.    Main Keys
  34.    ─────────────────────────────────────────────────────────────────── */
  35. <Ctrl F1>       BoxIt()                             // Execute BoxIt!
  36. <Alt F1>        BoxItMnuBar()                       // Menu Bar
  37.  
  38. /* ───────────────────────────────────────────────────────────────────
  39.    Quick Two-Keys
  40.    ─────────────────────────────────────────────────────────────────── */
  41. <Ctrl G><G>   PushKey(<G>) PushKey(<G>) BoxItMnuBar()   // Set Global Gap
  42. <Ctrl G><T>   PushKey(<T>) PushKey(<G>) BoxItMnuBar()   // Set Top Gap
  43. <Ctrl G><B>   PushKey(<B>) PushKey(<G>) BoxItMnuBar()   // Set Bottom Gap
  44. <Ctrl G><L>   PushKey(<L>) PushKey(<G>) BoxItMnuBar()   // Set Left Gap
  45. <Ctrl G><R>   PushKey(<R>) PushKey(<G>) BoxItMnuBar()   // Set RightGap
  46.  
  47. <Ctrl S><G>   PushKey(<G>) PushKey(<S>) BoxItMnuBar()   // Side Global Setting
  48. <Ctrl S><T>   PushKey(<T>) PushKey(<S>) BoxItMnuBar()   // Side Top Toggle
  49. <Ctrl S><B>   PushKey(<B>) PushKey(<S>) BoxItMnuBar()   // Side Bottom Toggle
  50. <Ctrl S><L>   PushKey(<L>) PushKey(<S>) BoxItMnuBar()   // Side Left Toggle
  51. <Ctrl S><R>   PushKey(<R>) PushKey(<S>) BoxItMnuBar()   // Side Right Toggle
  52.